**** Period growth rates



clear 
 ***graphs
 
 



use "Temp/Master_5yr.dta"

 
save "Temp/Master_5yr_0.dta", replace 

eststo clear

 *`"  "libdem_extra_vdem"  "l1_gov_change"   "l1_civ_war_all_PRIO"   "' 
 

 local coefficientofinterest `"  "libdem_extra_vdem"  "l1_gov_change"   "l1_civ_war_all_PRIO"   "l1_int_war_all_PRIO" 	 "P_ind_total_f_realshare"   "S_g5_unw_alliance_abs"   "cr_market_accessXBOEinv"    "' 

 
forvalues z=0/4{
clear
foreach x of local  coefficientofinterest {

use "Temp/Master_5yr_`z'.dta"

*drop if demidecade<4
forvalues r=1/7{
	 gen  mb_dem_ub_`z'_SPEC`r'=.
	 gen mb_dem_p_`z'_SPEC`r'=.	
	 gen mb_dem_lb_`z'_SPEC`r'=.

}
 
 
eststo mb_dom_`z': reghdfe dtax_non_trade_real      libdem_extra_vdem   l1_gov_change         , absorb(year iso_n) cluster(   iso_n) level(90) // Canonical variables only
 capture replace mb_dem_ub_`z'_SPEC1= _b[`x']  + _se[`x']*invttail(e(df_r), 0.05)    
 capture replace mb_dem_p_`z'_SPEC1= _b[`x']  										 
 capture replace mb_dem_lb_`z'_SPEC1=_b[`x']  - _se[`x']*invttail(e(df_r), 0.05) 	   
 
 

eststo mb_dom_int_`z': reghdfe dtax_non_trade_real      libdem_extra_vdem    l1_gov_change   l1_civ_war_all_PRIO   l1_int_war_all_PRIO , absorb(year iso_n) cluster(   iso_n) level(90) // international conflict
capture  replace mb_dem_ub_`z'_SPEC2= _b[`x']  + _se[`x']*invttail(e(df_r), 0.05) 
capture  replace mb_dem_p_`z'_SPEC2= _b[`x']  
capture  replace mb_dem_lb_`z'_SPEC2=_b[`x']  - _se[`x']*invttail(e(df_r), 0.05) 
 
  
eststo mb_res_`z': reghdfe dtax_non_trade_real      libdem_extra_vdem  l1_gov_change   l1_civ_war_all_PRIO   l1_int_war_all_PRIO   P_ind_total_f_realshare  , absorb(year iso_n) cluster(   iso_n)  level(90) // resources
capture  replace mb_dem_ub_`z'_SPEC3= _b[`x']  + _se[`x']*invttail(e(df_r), 0.05) 
capture  replace mb_dem_p_`z'_SPEC3= _b[`x']  
capture  replace mb_dem_lb_`z'_SPEC3=_b[`x']  - _se[`x']*invttail(e(df_r), 0.05) 
 
  

eststo mb_aid_`z': reghdfe dtax_non_trade_real      libdem_extra_vdem   l1_gov_change   l1_civ_war_all_PRIO   l1_int_war_all_PRIO  S_g5_unw_alliance_abs  , absorb(year iso_n) cluster(   iso_n) level(90) // aid
capture  replace mb_dem_ub_`z'_SPEC4= _b[`x']  + _se[`x']*invttail(e(df_r), 0.05) 
capture  replace mb_dem_p_`z'_SPEC4	= _b[`x']  
capture  replace mb_dem_lb_`z'_SPEC4=_b[`x']  - _se[`x']*invttail(e(df_r), 0.05) 
 
  
eststo mb_cr_`z': reghdfe dtax_non_trade_real       libdem_extra_vdem  l1_gov_change   l1_civ_war_all_PRIO   l1_int_war_all_PRIO   cr_market_accessXBOEinv  , absorb(year iso_n) cluster(   iso_n) level(90) // capital markets
capture  replace mb_dem_ub_`z'_SPEC5= _b[`x']  + _se[`x']*invttail(e(df_r), 0.05) 
capture  replace mb_dem_p_`z'_SPEC5= _b[`x']  
capture  replace mb_dem_lb_`z'_SPEC5=_b[`x']  - _se[`x']*invttail(e(df_r), 0.05) 
 
  

eststo mb_f_`z':  reghdfe dtax_non_trade_real          libdem_extra_vdem  l1_gov_change   l1_civ_war_all_PRIO   l1_int_war_all_PRIO 	 P_ind_total_f_realshare   S_g5_unw_alliance_abs   cr_market_accessXBOEinv    , absorb(year iso_n) cluster(   iso_n) level(90) // full specification
capture  replace mb_dem_ub_`z'_SPEC6= _b[`x']  + _se[`x']*invttail(e(df_r), 0.05) 
capture  replace mb_dem_p_`z'_SPEC6= _b[`x']  
capture  replace mb_dem_lb_`z'_SPEC6=_b[`x']  - _se[`x']*invttail(e(df_r), 0.05) 
 
  
eststo mb_fc_`z': reghdfe dtax_non_trade_real       libdem_extra_vdem   l1_gov_change   l1_civ_war_all_PRIO   l1_int_war_all_PRIO P_ind_total_f_realshare  S_g5_unw_alliance_abs   cr_market_accessXBOEinv X_* l1.drought_affected_merged  , absorb(year iso_n) cluster(  iso_n)  level(90) // full specification, controls
capture  replace mb_dem_ub_`z'_SPEC7= _b[`x']  + _se[`x']*invttail(e(df_r), 0.05) 
capture  replace mb_dem_p_`z'_SPEC7= _b[`x']  
capture  replace mb_dem_lb_`z'_SPEC7=_b[`x']  - _se[`x']*invttail(e(df_r), 0.05) 
 
  
   
 keep mb_*
 gen  movingwindow=`z'
 keep if _n==1
 
 gen variable="`x'"
 
 
save "TEMP/res_w`z'_`x'"    ,replace

  
 
}
 }
 
 clear all
 
 forvalues z=0/4{
 
foreach x of local  coefficientofinterest {

append using "TEMP/res_w`z'_`x'"


}

}



 

  
 
 

 forvalues z=1/7{
		gen e_point_SPEC`z'=  .
		gen e_lb_SPEC`z'=.
		gen e_ub_SPEC`z'=. 
}


 forvalues z=1/7{

	forvalues y=0/4{
 		replace e_point_SPEC`z'=  mb_dem_p_`y'_SPEC`z' 	if movingwindow==`y'
		replace e_lb_SPEC`z'=mb_dem_lb_`y'_SPEC`z'			if movingwindow==`y'
		replace e_ub_SPEC`z'=mb_dem_ub_`y'_SPEC`z' 			if movingwindow==`y'
		}
		
		
}



keep e_* movingwindow variable

 reshape long e_point_SPEC  e_lb_SPEC  e_ub_SPEC , i(movingwindow  variable) j(SPEC)  string
	 
 destring SPEC, replace
 
 rename  e_point_SPEC 	y 
 rename  e_lb 			yl  
 rename  e_ub  			yu 
 
 preserve
		gen frequency="Window_5years"
		keep if movingwindow==0
		drop movingwindow
		save "TEMP/Benchmark_plot_5years" , replace
 restore 
 
separate y, by(movingwindow)
separate yu	, by(movingwindow)
separate yl	, by(movingwindow)
 
 
  
 ** democracy coefficient
 
 
   preserve 

				keep if variable=="libdem_extra_vdem"


		
		
				* do not show w/o controls
				
					replace SPEC=. if SPEC==6
					replace SPEC=6 if SPEC==7
					
				gen graph_position=SPEC*10+movingwindow


				label  define x     10  "window(+0)"  11 "window(+1)" 12 "window(+2)"  13 "window(+3)" 14 "window(+4)" ///
									20  "window(+0)"  21 "window(+1)" 22 "window(+2)"  23 "window(+3)" 24 "window(+4)" ///
									30  "window(+0)"  31 "window(+1)" 32 "window(+2)"  33 "window(+3)" 34 "window(+4)" ///
									40  "window(+0)"  41 "window(+1)" 42 "window(+2)"  43 "window(+3)" 44 "window(+4)" ///
									50  "window(+0)"  51 "window(+1)" 52 "window(+2)"  53 "window(+3)" 54 "window(+4)" ///
									60  "window(+0)"  61 "window(+1)" 62 "window(+2)"  63 "window(+3)" 64 "window(+4)"  
						
							 
							 
				label  value  graph_position x 

				 rename graph_position x
							 
				local group1 SPEC
				local group2 movingwindow
				twoway (scatter y0 x , msymbol(S) msize(medium)  xsize(8) ) ///
					   (rcap yu0 yl0 x)  ///
					   (scatter y1 x , msymbol(Sh) msize(medium)) ///
					   (rcap yu1 yl1 x)  ///
					   (scatter y2 x , msymbol(Oh) msize(large)) ///
					   (rcap yu2 yl2 x )  ///
					   (scatter y3 x , msymbol(T) msize(medium)) ///
					   (rcap yu3 yl3 x )  ///
					   (scatter y4 x , msymbol(D) msize(medium)) ///
					   (rcap yu4 yl4 x ), scheme(lean1) ///
					   xlabel(11 "Canonical" 21 "Canonical incl. wars " 31 "Resources" 41 "Aid" 51 "Credit access" 61 "Full"  , angle(45)) xtitle("Specification")   ///
					   ytitle(Coefficient) yline(0, lpattern(dash))  ///
					   legend( order(1 "Original window (Ow)" 3 "Ow + 1" 5 "Ow + 2" 7 "Ow + 3" 9 "Ow + 4")  position(3) row(6) ring(100) title("Legend", size(medsmall)))  ///
					   title("Coefficient on liberal democracy score ")
					   
				 
					   
					   
					graph save  "Temp/Coefficient_libdem_extra_vdem" , replace 
					graph export  "Output/Graphs/Appendix/APP_FIG_5_4a.pdf" , replace 
					
					 

	 restore 
	
	 
  ** Turnover
  
  
	preserve
	
					keep if variable=="l1_gov_change"

					* do not show w/o controls
						replace SPEC=. if SPEC==6
						replace SPEC=6 if SPEC==7
						
					
					gen graph_position=SPEC*10+movingwindow



					label  define x     10  "window(+0)"  11 "window(+1)" 12 "window(+2)"  13 "window(+3)" 14 "window(+4)" ///
										20  "window(+0)"  21 "window(+1)" 22 "window(+2)"  23 "window(+3)" 24 "window(+4)" ///
										30  "window(+0)"  31 "window(+1)" 32 "window(+2)"  33 "window(+3)" 34 "window(+4)" ///
										40  "window(+0)"  41 "window(+1)" 42 "window(+2)"  43 "window(+3)" 44 "window(+4)" ///
										50  "window(+0)"  51 "window(+1)" 52 "window(+2)"  53 "window(+3)" 54 "window(+4)" ///
										60  "window(+0)"  61 "window(+1)" 62 "window(+2)"  63 "window(+3)" 64 "window(+4)"  
							
								 
								 
					label  value  graph_position x 

					 rename graph_position x
								 
					local group1 SPEC
					local group2 movingwindow
					twoway (scatter y0 x , msymbol(S) msize(medium)  xsize(8)) ///
						   (rcap yu0 yl0 x)  ///
						   (scatter y1 x , msymbol(Sh) msize(medium)) ///
						   (rcap yu1 yl1 x)  ///
						   (scatter y2 x , msymbol(Oh) msize(large)) ///
						   (rcap yu2 yl2 x )  ///
						   (scatter y3 x , msymbol(T) msize(medium)) ///
						   (rcap yu3 yl3 x )  ///
						   (scatter y4 x , msymbol(D) msize(medium)) ///
						   (rcap yu4 yl4 x ), scheme(lean1) ///
							xlabel(11 "Canonical" 21 "Canonical incl. wars " 31 "Resources" 41 "Aid" 51 "Credit access" 61 "Full"  , angle(45)) xtitle("Specification")   ///
							ytitle(Coefficient) yline(0, lpattern(dash))  ///
							legend( order(1 "Original window (Ow)" 3 "Ow + 1" 5 "Ow + 2" 7 "Ow + 3" 9 "Ow + 4")  position(3) row(6) ring(100) title("Legend", size(medsmall)))  ///
							title("Coefficient on government turnover")
						   
						   
						   
							graph save "Temp/Coefficient_l1_gov_change" , replace 
							graph export  "Output/Graphs/Appendix/APP_FIG_5_4b.pdf" , replace 
	restore 
			 


  	
  ** Civil war
  
  
	preserve
	
					keep if variable=="l1_civ_war_all_PRIO"

					* do not show w/o controls
					
						replace SPEC=. if SPEC==6
						replace SPEC=6 if SPEC==7
					
					gen graph_position=SPEC*10+movingwindow



					label  define x     10  "window(+0)"  11 "window(+1)" 12 "window(+2)"  13 "window(+3)" 14 "window(+4)" ///
										20  "window(+0)"  21 "window(+1)" 22 "window(+2)"  23 "window(+3)" 24 "window(+4)" ///
										30  "window(+0)"  31 "window(+1)" 32 "window(+2)"  33 "window(+3)" 34 "window(+4)" ///
										40  "window(+0)"  41 "window(+1)" 42 "window(+2)"  43 "window(+3)" 44 "window(+4)" ///
										50  "window(+0)"  51 "window(+1)" 52 "window(+2)"  53 "window(+3)" 54 "window(+4)" ///
										60  "window(+0)"  61 "window(+1)" 62 "window(+2)"  63 "window(+3)" 64 "window(+4)" 
								 
								 
					label  value  graph_position x 

					 rename graph_position x
								 
					local group1 SPEC
					local group2 movingwindow
					twoway (scatter y0 x , msymbol(S) msize(medium)  xsize(8)) ///
						   (rcap yu0 yl0 x)  ///
						   (scatter y1 x , msymbol(Sh) msize(medium)) ///
						   (rcap yu1 yl1 x)  ///
						   (scatter y2 x , msymbol(Oh) msize(large)) ///
						   (rcap yu2 yl2 x )  ///
						   (scatter y3 x , msymbol(T) msize(medium)) ///
						   (rcap yu3 yl3 x )  ///
						   (scatter y4 x , msymbol(D) msize(medium)) ///
						   (rcap yu4 yl4 x ), scheme(lean1) ///
							xlabel(11 "Canonical" 21 "Canonical incl. wars " 31 "Resources" 41 "Aid" 51 "Credit access" 61 "Full"  , angle(45)) xtitle("Specification")   ///
							ytitle(Coefficient) yline(0, lpattern(dash))  ///
							legend( order(1 "Original window (Ow)" 3 "Ow + 1" 5 "Ow + 2" 7 "Ow + 3" 9 "Ow + 4")  position(3) row(6) ring(100) title("Legend", size(medsmall)))  ///
							title("Coefficient on civil war")
						   
						   
						   
						   
						   
						   graph save "Temp/Coefficient_l1_civ_war_all_PRIO" , replace 
						   graph export  "Output/Graphs/Appendix/APP_FIG_5_4c.pdf" , replace 

	restore 
		
** International vars
  
  
	preserve
	
					keep if variable=="l1_int_war_all_PRIO"
					
					
					* do not show w/o controls
					
						replace SPEC=. if SPEC==6
						replace SPEC=6 if SPEC==7

					gen graph_position=SPEC*10+movingwindow



					label  define x     10  "window(+0)"  11 "window(+1)" 12 "window(+2)"  13 "window(+3)" 14 "window(+4)" ///
										20  "window(+0)"  21 "window(+1)" 22 "window(+2)"  23 "window(+3)" 24 "window(+4)" ///
										30  "window(+0)"  31 "window(+1)" 32 "window(+2)"  33 "window(+3)" 34 "window(+4)" ///
										40  "window(+0)"  41 "window(+1)" 42 "window(+2)"  43 "window(+3)" 44 "window(+4)" ///
										50  "window(+0)"  51 "window(+1)" 52 "window(+2)"  53 "window(+3)" 54 "window(+4)" ///
										60  "window(+0)"  61 "window(+1)" 62 "window(+2)"  63 "window(+3)" 64 "window(+4)"  
								 
								 
					label  value  graph_position x 

					 rename graph_position x
								 
					local group1 SPEC
					local group2 movingwindow
					twoway (scatter y0 x , msymbol(S) msize(medium)  xsize(8) ) ///
						   (rcap yu0 yl0 x)  ///
						   (scatter y1 x , msymbol(Sh) msize(medium)) ///
						   (rcap yu1 yl1 x)  ///
						   (scatter y2 x , msymbol(Oh) msize(large)) ///
						   (rcap yu2 yl2 x )  ///
						   (scatter y3 x , msymbol(T) msize(medium)) ///
						   (rcap yu3 yl3 x )  ///
						   (scatter y4 x , msymbol(D) msize(medium)) ///
						   (rcap yu4 yl4 x ), scheme(lean1) ///
							xlabel(11 "Canonical" 21 "Canonical incl. wars " 31 "Resources" 41 "Aid" 51 "Credit access" 61 "Full"  , angle(45)) xtitle("Specification")   ///
							ytitle(Coefficient) yline(0, lpattern(dash))  ///
							legend( order(1 "Original window (Ow)" 3 "Ow + 1" 5 "Ow + 2" 7 "Ow + 3" 9 "Ow + 4")  position(3) row(6) ring(100) title("Legend", size(medsmall)))  ///
 						   title("Coefficient on international wars")
						   
						   
						   
						   graph save "Temp/Coefficient_l1_int_war_all_PRIO" , replace 
						   graph export  "Output/Graphs/Appendix/APP_FIG_5_4d.pdf" , replace 
						   
	restore 
			 
** Resources 
  
  
	preserve
	
					keep if variable=="P_ind_total_f_realshare"

					* do not show w/o controls
					
						replace SPEC=. if SPEC==6
						replace SPEC=6 if SPEC==7

					gen graph_position=SPEC*10+movingwindow



					label  define x     10  "window(+0)"  11 "window(+1)" 12 "window(+2)"  13 "window(+3)" 14 "window(+4)" ///
										20  "window(+0)"  21 "window(+1)" 22 "window(+2)"  23 "window(+3)" 24 "window(+4)" ///
										30  "window(+0)"  31 "window(+1)" 32 "window(+2)"  33 "window(+3)" 34 "window(+4)" ///
										40  "window(+0)"  41 "window(+1)" 42 "window(+2)"  43 "window(+3)" 44 "window(+4)" ///
										50  "window(+0)"  51 "window(+1)" 52 "window(+2)"  53 "window(+3)" 54 "window(+4)" ///
										60  "window(+0)"  61 "window(+1)" 62 "window(+2)"  63 "window(+3)" 64 "window(+4)"  
								 
								 
					label  value  graph_position x 

					 rename graph_position x
								 
					local group1 SPEC
					local group2 movingwindow
					twoway (scatter y0 x , msymbol(S) msize(medium)  xsize(8)) ///
						   (rcap yu0 yl0 x)  ///
						   (scatter y1 x , msymbol(Sh) msize(medium)) ///
						   (rcap yu1 yl1 x)  ///
						   (scatter y2 x , msymbol(Oh) msize(large)) ///
						   (rcap yu2 yl2 x )  ///
						   (scatter y3 x , msymbol(T) msize(medium)) ///
						   (rcap yu3 yl3 x )  ///
						   (scatter y4 x , msymbol(D) msize(medium)) ///
						   (rcap yu4 yl4 x ), scheme(lean1) ///
							xlabel(11 "Canonical" 21 "Canonical incl. wars " 31 "Resources" 41 "Aid" 51 "Credit access" 61 "Full"  , angle(45)) xtitle("Specification")   ///
							ytitle(Coefficient) yline(0, lpattern(dash))  ///
							legend( order(1 "Original window (Ow)" 3 "Ow + 1" 5 "Ow + 2" 7 "Ow + 3" 9 "Ow + 4")  position(3) row(6) ring(100) title("Legend", size(medsmall)))  ///
							title("Coefficient on resource prices")
						   
						   
						   
						   graph save "Temp/Coefficient_P_ind_total_f_realshare" , replace 
						   graph export  "Output/Graphs/Appendix/APP_FIG_5_4e.pdf" , replace 
	restore 
			 
** Aid
   
  
	preserve
	
					keep if variable=="S_g5_unw_alliance_abs"

					* do not show w/o controls
					
						replace SPEC=. if SPEC==6
						replace SPEC=6 if SPEC==7



					gen graph_position=SPEC*10+movingwindow



					label  define x     10  "window(+0)"  11 "window(+1)" 12 "window(+2)"  13 "window(+3)" 14 "window(+4)" ///
										20  "window(+0)"  21 "window(+1)" 22 "window(+2)"  23 "window(+3)" 24 "window(+4)" ///
										30  "window(+0)"  31 "window(+1)" 32 "window(+2)"  33 "window(+3)" 34 "window(+4)" ///
										40  "window(+0)"  41 "window(+1)" 42 "window(+2)"  43 "window(+3)" 44 "window(+4)" ///
										50  "window(+0)"  51 "window(+1)" 52 "window(+2)"  53 "window(+3)" 54 "window(+4)" ///
										60  "window(+0)"  61 "window(+1)" 62 "window(+2)"  63 "window(+3)" 64 "window(+4)"  
							
								 
								 
					label  value  graph_position x 

					 rename graph_position x
								 
					local group1 SPEC
					local group2 movingwindow
					twoway (scatter y0 x , msymbol(S) msize(medium)  xsize(8)) ///
						   (rcap yu0 yl0 x)  ///
						   (scatter y1 x , msymbol(Sh) msize(medium)) ///
						   (rcap yu1 yl1 x)  ///
						   (scatter y2 x , msymbol(Oh) msize(large)) ///
						   (rcap yu2 yl2 x )  ///
						   (scatter y3 x , msymbol(T) msize(medium)) ///
						   (rcap yu3 yl3 x )  ///
						   (scatter y4 x , msymbol(D) msize(medium)) ///
						   (rcap yu4 yl4 x ), scheme(lean1) ///
							xlabel(11 "Canonical" 21 "Canonical incl. wars " 31 "Resources" 41 "Aid" 51 "Credit access" 61 "Full"  , angle(45)) xtitle("Specification")   ///
							ytitle(Coefficient) yline(0, lpattern(dash))  ///
							legend( order(1 "Original window (Ow)" 3 "Ow + 1" 5 "Ow + 2" 7 "Ow + 3" 9 "Ow + 4")  position(3) row(6) ring(100) title("Legend", size(medsmall)))  ///
							title("Coefficient on aid access")
						   
						   
						   
						   graph save "Temp/Coefficient_S_g5_unw_alliance_abs" , replace 
						   graph export  "Output/Graphs/Appendix/APP_FIG_5_4f.pdf" , replace 
	restore 
			 
		
** Credit market access
  
  
	preserve
	
					keep if variable=="cr_market_accessXBOEinv"

					* do not show w/o controls
					
						replace SPEC=. if SPEC==6
						replace SPEC=6 if SPEC==7


					gen graph_position=SPEC*10+movingwindow



					label  define x     10  "window(+0)"  11 "window(+1)" 12 "window(+2)"  13 "window(+3)" 14 "window(+4)" ///
										20  "window(+0)"  21 "window(+1)" 22 "window(+2)"  23 "window(+3)" 24 "window(+4)" ///
										30  "window(+0)"  31 "window(+1)" 32 "window(+2)"  33 "window(+3)" 34 "window(+4)" ///
										40  "window(+0)"  41 "window(+1)" 42 "window(+2)"  43 "window(+3)" 44 "window(+4)" ///
										50  "window(+0)"  51 "window(+1)" 52 "window(+2)"  53 "window(+3)" 54 "window(+4)" ///
										60  "window(+0)"  61 "window(+1)" 62 "window(+2)"  63 "window(+3)" 64 "window(+4)"  
								 
								 
					label  value  graph_position x 

					 rename graph_position x
								 
					local group1 SPEC
					local group2 movingwindow
					twoway (scatter y0 x , msymbol(S) msize(medium)  xsize(8)) ///
						   (rcap yu0 yl0 x)  ///
						   (scatter y1 x , msymbol(Sh) msize(medium)) ///
						   (rcap yu1 yl1 x)  ///
						   (scatter y2 x , msymbol(Oh) msize(large)) ///
						   (rcap yu2 yl2 x )  ///
						   (scatter y3 x , msymbol(T) msize(medium)) ///
						   (rcap yu3 yl3 x )  ///
						   (scatter y4 x , msymbol(D) msize(medium)) ///
						   (rcap yu4 yl4 x ), scheme(lean1) ///
							xlabel(11 "Canonical" 21 "Canonical incl. wars " 31 "Resources" 41 "Aid" 51 "Credit access" 61 "Full"  , angle(45)) xtitle("Specification")   ///
							ytitle(Coefficient) yline(0, lpattern(dash))  ///
							legend( order(1 "Original window (Ow)" 3 "Ow + 1" 5 "Ow + 2" 7 "Ow + 3" 9 "Ow + 4")  position(3) row(6) ring(100) title("Legend", size(medsmall)))  ///
							title("Coefficient on credit market access")
						   
						   
						   
						   graph save "Temp/Coefficient_cr_market_accessXBOEinv" , replace 
						   graph export  "Output/Graphs/Appendix/APP_FIG_5_4g.pdf" , replace 
	restore 
	
	
	
	
	
 			 
